ButtonPromptOBJ METHODS constructor Init(Style:byte;Tit:string); destructor Done; procedure AddLine(Str:string); procedure Show:tAction; procedure SetOption(ID:byte;Str:StringBut;Hotkey:word;Act:tAction); function WinForm: WinFormPtr;